Games of Daze/Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso/x2ftp/msdos/source/swagd-f/dos.swg/0057_BOOT Source.pas

Pascal/Delphi Source File | 1994-05-26 | 453 b | 32 lines

procedure ColdBoot; assembler;
asm
  xor    ax,ax
  mov    ds,ax
  mov    ah,$40
  mov    es,ax
  mov    word ptr es:$72,0
  mov    ax,$FFFF
  mov    es,ax
  xor    si,si
  push   ax
  push   si
  retf
end;

procedure WarmBoot; assembler;
asm
  xor    ax,ax
  mov    ds,ax
  mov    ah,$40
  mov    es,ax
  mov    word ptr es:$72,$1234
  mov    ax,$FFFF
  mov    es,ax
  xor    si,si
  push   ax
  push   si
  retf
end;